%!PS-Adobe-3.0 EPSF-3.0
%%BoundingBox: -3 -3 3 3
5 dict
begin
/box
{
	0 0 moveto
	0 1 lineto
	1 1 lineto
	1 0 lineto
	closepath
	fill
} def
/circ
{
	0 0 1 0 360 arc
	closepath
	fill
} def
-2 0 translate
.25 .25 scale
20 rotate
7 {
	gsave
		gsave
			circ
		grestore 
		gsave
			gsave
				-.25 -1 translate
				1 -1 scale
				.5 2.5 scale
				box
			grestore 
			gsave
				0 -1.5 translate
				2 {
					gsave
						gsave
							-.25 0 translate
							-45 rotate
							1 -1 scale
							.5 2 scale
							box
						grestore 
						gsave
							.25 0 translate
							45 rotate
							-1 -1 scale
							.5 2 scale
							box
						grestore 
					grestore 
					0 -1.75 translate
				} repeat
			grestore 
		grestore 
	grestore 
	2.75 0 translate
} repeat
end
showpage

